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section  i . introduction 

1.1  Purpose  of  the  Validation  Summary  Report 

/- 

The  purpose  of  the  Validation  Summary  Report  (VSR)  is  to  identify  individual 
COBOL  lannuaqe  elements  whose  i mp 1 emen t a t ion  does  not  conform  to  Federal  Stan- 
dard COBOL  as  adopted  from  American  National  Standard  Proerammino  Lannuaoe 
COBOL/  X3. 23-1974/  by  Federal  Information  Processinq  Standard  21-1  (FIPS 
PUB  21-1).  V- 

1.2  Preparation  of  thp  VSR 

The  Validation  Summary  Report  is  prepared  by  analyzing  the  results  of  running 
the  COBOL  Compiler  Validation  System  (CCVS).  The  COBOL  Compiler  Validation 
System  consists  of  audit  routines  containing  features  of  Federal  Standard  COPOL, 
their  related  data/  and  an  executive  routine  (VP-routine)  which  prepares  the 
audit  routines  for  compilation.  Each  audit  routine  is  a COBOL  program  which 
includes  many  tests  and  supporting  procedures  indicating  the  result  of  the 
tests. 

The  testing  of  a compiler  in  a particular  hardware/ooerating  system  environment 
is  accomplished  by  compiling  and  executing  each  audit  routine.  The  report  pro- 
duced by  each  routine  tells  whether  the  compiler  passed  or  failed  the  tests  ir 
the  routine.  If  the  compiler  rejects  some  language  elements  by  terminating 
compilation/  giving  fatal  diagnostic  messages/  or  terminating  execution  abnor- 
mally/ then  the  test  containing  the  code  the  compiler  was  unable  to  process  is 
deleted  and  the  audit  routine  compilation  and  execution  repeated. 

The  compilation  listings  and  the  output  reports  of  the  audit  routines  con- 
stitute the  raw  data  from  which  the  members  of  the  Federal  COPOL  Compiler 
Testing  Service  produce  a Validation  Summary  Report. 

1.3  Organization  of  the  VSR 

The  Validation  Summary  Report  is  made  up  of  several  sections  the  contents  of 
which  are  described  below. 

a.  Section  2 summarizes  the  results  of  the  compilation  and  execution 
of  the  programs  comprising  the  COPOL  Compiler  Validation  System.  Section  2 
is  subdivided  into  a subsection  representing  each  level  of  each  module  defined 
in  American  National  Standard  Programming  Language  COBOL/  *7.23-1974.  Each 
subsection  contains  a list  of  all  of  the  language  elements  which  must  be 
implemented  in  order  to  claim  support  of  that  level/module.  The  list  of 
language  elements  wilt  be  annotated  to  include  a description  of  both  syntax 
and  semantic  errors  detected  during  the  validation. 

b.  Section  3 - FIPS  PUB  21-1  defines  four  Federal  levels  of  the  COPOL 
Standard.  Section  3 of  the  VSR  lists  the 
by  the  Federal  level  in  which  the  problem 


discrepancies  described  in  Section  2 
occurs  . 
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c.  Section  4 contains  inform  at  ion  which  describes  the  software  environ- 
ment in  which  the  compiler  was  tested.  This  includes  the  name  and  version  of 
the  operation  system;  the  i mp l emen t o r -na r.e s which  were  used  in  the  Environment 
Division  of  the  programs  comprising  the  C C V S ; the  options  used  with  the  com- 
piler; and  if  applicable*  information  regarding  the  use  of  compiler  optimiza- 
tion features. 

d.  Appendix  A is  the  Validation  Summary  Working  Document*  a working 
paper  resulting  from  the  compilation  and  e»ecution  of  the  CCVS*  and  from  which 
the  V S & is  derived. 

1.4  Afcstract  Covering  Compliance  to  American  National  Standard  Programming 

Language  CD POL 

Definition  of  an  Implementation  of  American  National  Standard  Programming 
Language  COBOL  (excerpts  from  X3. 22-1974*  Chapter  1*  Section  1.5). 

An  implementation  is  defined  to  meet  the  requirements  of  the  American 
National  Standard  COBOL  specification  if  that  implementation  includes  a 
fully  implemented  specified  level  of  each  of  the  functional  processing 
modules  and  of  the  Nucleus  as  defined  in  this  Standard.  It  follows  from 
this  that*  in  order  to  meet  the  requirements  of  this  Standard*  an  imple- 
mentation must: 

a.  Not  require  the  inclusion  of  substitute  or  additional  languaae  ele- 
ments in  the  source  prooram,  in  order  to  accomplish  any  part  of  the  function 
of  any  of  the  standard  language  elements. 

b.  Accept  all  standard  lanouage  elements  contained  in  a qiven  level 
of  a module  which  is  specified  as  beina  included  in  the  implementation* 
except  as  specifically  exempted  (as  pertainiro  to  specific  hardware  components 
for  which  support  is  not  claimed).  See  "Elements  that  Pertain  to  Specific 
Hardware  Components"  below. 

These  points  are  of  particular  pertinence  in  two  areas: 

(1)  There  are  throughout  the  American  National  Standard  COBOL 
specification  certain  lanauage  elements  whose  syntax*  or  effect*  is  specified 
to  be*  in  part*  implementor- defined.  While  the  implerentor  specifies  the 
constraints  on  that  portion  of  each  element's  syntax  or  rules  that  is  indi- 
cated in  this  Standard  to  be  implementor-defined*  such  constraints  may  not 
include  any  reouirement  for  the  inclusion  in  the  source  program  of  sub- 
stitute or  additional  lannuaoe  elements. 

(2)  When  a function  is  provided  outside  the  source  prooram  that 
accomplishes  a function  specified  by  any  particular  standard  COBOL  element* 
then  the  implementation  must  not  require*  except  for  Environment  Division 
elements*  the  specification  of  tnat  external  function  in  place  of  or  in 
addition  to  that  standard  lannuaoe  element: 

The  following  qualifications  apply  to  the  American  National  Standard  COBOL 
specificat ion: 
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a . There  are  certain  language  elements  which  pertain  to  specific  types 
of  hardware  components.  In  order  for  an  implementation  to  meet  the  require- 
ments of  this  standard/  the  implementor  must  specify  the  minimum  hardware 
configuration  required  for  that  implementation  and  the  hardware  components 
that  it  supports.  Further/  when  support  is  thus  claimed  for  a specific  hard- 
ware component/  alt  standard  language  elements  that  pertain  to  that  component 
must  be  implemented  if  the  module  in  which  they  appear  is  included  in  the 
implementation.  Language  elements  that  pertain  to  specific  hardware  com- 
ponents for  which  support  is  not  claimed/  need  not  be  implemented.  However/ 
the  absence  of  such  elements  from  an  implementation  of  American  National 
Standard  COBOL  must  be  specified. 

b.  An  implementation  of  American  National  Standard  COBOL  may  include 
the  ENTER  statement  or  not/  at  the  option  of  the  implementor. 

c.  An  implementation  that  includes/  in  addition  to  a specified  level  of 
each  of  the  functional  processing  modules  and  of  the  Nucleus/  elements  or 
functions  that  either  are  not  defined  in  the  American  National  Standard  C030L 
specification  or  are  defined  in  a given  level  of  a standard  module  not  other- 
wise included  in  the  implementation/  meets  the  requirements  of  this  Standard. 
This  is  true  even  though  it  may  imply  the  extension  of  the  list  of  reserved 
words  by  the  implementor/  and  prevent  proper  compilation  of  some  programs  that 
meet  the  requirements  of  this  Standard.  The  implementor  must  specify  any 
optional  language  (language  not  defined  in  a specified  level  but  defined  else- 
where in  the  Standard)  or  extensions  (lanauaoe  elements  or  functions  not 
defined  in  this  Standard)  that  are  included  in  the  implementation. 

d.  In  general/  the  American  National  Standard  COBOL  specification 
specifies  no  upper  limit  on  such  things  as  the  number  of  statements  in  a pro- 
gram / the  number  of  operands  permitted  in  certain  statements/  etc.  It  is 
recognized  that  these  limits  will  vary  from  one  implementation  of  American 
National  Standard  COBOL  to  another  and  may  prevent  the  proper  compilation  of 
some  programs  that  meet  the  requirements  of  this  standard. 

IBPLEKENTOR-DEFINED  LANGUAGE  SPF  C I f I C A T I ON'S 

The  language  elements  in  the  following  lists  depend  on  implementor  defini- 
tions to  complete  the  specificaton  of  the  syntax  or  rules  for  the  elements. 

The  elements  whose  syntax  is  partly  i mp l emen t or -def i ned  are: 

Element  Imp lement or-Def i ned  Aspect 


SOURCE-COMPUTER  paragraph 
OBJECT-COPPUTER  paragraph 
PEPORY  SIZE  clause 
a l phabet -name 


computer-name 
computer-name 
int  eger 

implementor-name;  whether  imple- 
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SPECIAL-NAMES  paragraph 
ASSIGN  clause 
VALUE  OF  clause 

RERUN  clause 

CALL  and  CANCEL  statements 

COPT  statement 

ENTER  statement 
Margin  R 
Area  8 

Qualification 

The  elements  whose  effect  is  partly 
E l ement 

alphabet -name 

i mp lament  or -name  switches 

USAGE  IS  COMPUTATIONAL 
clause 

USAGE  IS  INDEX  clause 
SYNCHRONIZED  clause 

ACCEPT  statement 


mentor-names  are  provided. 

implementor-name 

implementor-name 

implementor-name;  whether  imolementor 
names  are  provided. 

implementor-name  and  the  form;  the 
implementor  provides  at  least  one 
of  seven  specified  forms. 

relationship  between  operand  and  the 
referenced  program. 

relationship  between  library-name 
text-name*  and  the  library. 

I anguage-name 

The  location. 

The  number  of  character  positions. 

The  number  of  qualifiers;  at  least 
five  must  be  supported. 


Implementor-Defined  Aspect 


The  correspondence  between  native  and 
foreign  character  sets. 

Whether  setting  can  change  during 
execut ion. 

Representation  and  whether  automatic 
alignment  occurs. 

Representation  and  whether  automatic 
alianment  occurs. 

Whether  implicit  FILLER  positions  are 
generated;  their  effect  on  the  site 
of  group  items  and  redefining  items 

Maximum  size  of  one  transfer  of  data 
in  Leve  l 1 Nuc I eus  . 


implementor-defined  are: 
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DISPLAY  statement  Maximum  size  of  one  transfer  of  (fata 

in  Level  1 Nucleus. 

Numeric  test  Representation  of  valid  sign  in  the 

absence  of  the  SIGN  IS  S E P AP  A TF 
clause. 

Comparison  of  nonnumeric  items  Collating  seauence*  where  NATIVE  or 

i mp l em e nt o r -n a m e collating  sequence 
is  implicitly  or  explicitly 
specified. 

Arithmetic  expressions  Number  of  places  carried  for  inter- 

mediate results. 

Elements  That  Pertain  to  Specific  Hardware  Components 

The  standard  language  elements  in  the  list  that  follows  pertain  to  specific 
types  of  hardware  components.  These  language  elements  must  be  implemented 
in  an  implementation  of  American  National  Standard  COBOL  when  support  is 
claimed*  by  the  implementor*  for  the  specific  types  of  hardware  components  to 
which  they  pertain*  and  the  module  in  which  they  are  defined  is  included  in 
that  implementation. 

Element  Hardware  Component 


CODE-SET  clause 


Device  capable  of  supporting  the 
specified  code. 


MULTIPLE  FILE  TAPE  clause  Reel 


CLOSE. ..REEL/UNIT  statement 

CLOSE NO  REWIND  statement 

OPEN ... R EVE RSE D statement 


OPEN.. .NO  REWIND  statement 

OPEN.. .1-0  statement 
(Sequential  1-0  only) 

OPEN  EXTEND  statement 

REWRITE  statement 

(Sequential  1-0  only) 


Reel  or  mass  storage 

Reel  or  mass  storage 

Reel  with  the  capability  of  making 
records  available  in  the  reversed 
order;  mass-storage  with  the  cap- 
ability of  making  records  avail- 
able in  the  reversed  order. 

Reel  or  mass  storage 

Mass  storage 


Reel  or  mass  storage 
Mass  storage 
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SEND  . . ,°E FORE/AFTER 
ADVANCING  s t at  eirent 


USE.. .1-0  (Sequential 
1-0  only) 

WRI TE . . .BE  F ORE/ AF  TE  R 
ADVANCING 


Devices  capable  of  vertical  posi- 
tioning; devices  capable  of  action 
based  on  unttoni c -names . 

Kass  storage 

Devices  capable  of  vertical  posi- 
tioning; devices  capable  of  action 
based  on  n-nefflonic-nane. 
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1.5  The  Federal  COBOL  Standard 

The  COPOL  compiler  validation  results  enclosed  in  this  document  reflect  the 
degree  to  which  the  subject  COSOL  compiler  implements  the  Federal  COBOL 
Standard.  The  Federal  C 0 n 0 L Standard  is  essentially  the  same  as  the 
American  National  Standard  Programming  Language  COBOL*  X3. 23-1974*  with  two 
e xcep  ti ons: 

The  Federal  COBOL  Standard  defines  4 levels  and  the  ANSI 
Standard  defines  only  the  minimum  COPOL  implementation  and 
the  full  standard.  Low  and  High  levels  of  the  Federal 
COBOL  Standard  (see  1.5.1)  correspond  to  the  above  two  ANSI 
levels  (minus  the  Report  Writer  module).  Two  additional 
levels*  low-intermediate  and  high-intermediate  have  been 
included  in  the  Federal  Standard  between  the  highest  and 
lowest  subsets.  These  additional  levels  accommodate 
hardware  which  cannot  surport  the  full  standard*  but  which 
is  capable  of  implementing  more  than  the  minimum  standard. 

The  Report  Writer  Module  is  not  contained  in  the  Federal 
COBOL  Standard. 

The  Federal  CCFOL  Standard  requires  that  a compiler  contain  as  a minimum  the 
elements  specified  in  at  least  one  of  the  Federal  levels.  No  restrictions  are 
imposed  on  the  inclusion  of  selected  features  from  higher  levels  or  even  uniaue 
vendor  extensions.  Compatibility  ameung  various  implementations  of  a given 
level  containing  additional  features  must  be  controlled  by  management  imposed 
standards  and  restrictions. 

1.5.1  Federal  Standard  COBOL  Levels 

a.  Federal  Standard  COPOL  specifications  are  the  lanouaoe  specificaticrs 
contained  in  American  National  Standard  Programming  Languaoe  COBOL*  *3.23-1974. 
For  purposes  of  the  Federal  Standard*  the  modules  defined  in  X3. 23-1974  are 
combined  into  four  levels.  Not  all  computers  are  large  enouoh  to  accommodate  a 
CjHOL  compiler  containing  the  full  ANSI  Standard.  Therefore*  the  Federal 
Government  requires  that  all  compilers  acquired  by  its  aoencies  contain  as  a 
minimum  one  of  the  four  Federal  levels*  depending  on  machine  size*  con f i ojr a t i o r 
and  user  needs.  The  knowledge  that  all  computers  will  support  at  least  one  of 
these  four  subsets  simplifies  the  task  of  developing  machine-independent  C OE  C L 
programs. 

b.  The  four  levels  of  Federal  Standard  COPOL  are  identified  as:  Low* 

Low- I nt e r me d i a t e*  High-Intermediate*  and  High.  Each  Federal  Standard  COBOL 
level  is  composed  of  either  the  high  or  low  levels  of  the  nucleus  and  ten  of 
the  eleven  Functional  Processing  modules  ( F P M s ) defined  in  *3.23-1974. 

The  four  Federal  Standard  COBOL  levels  are  reflected  in  the  following  table. 

The  numbers  in  the  taole  refer  to  the  level  within  the  FP1  or  nucleus  as 
designated  in  *3. 23-1974*  and  a dash  in  the  table  denotes  that  the  corres- 
oonding  F PM  is  omitted. 
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Low 

Level 

Low 

Inter- 
mediate 
Leve  l 

High 

Inter- 

mediate 

Level 

High 
Leve  l 

NUCLEUS 

1 

1 

2 

2 

f PI'S 

table  handling 

1 

1 

2 

2 

sequential  j-o 

1 

1 

2 

2 

RELATIVE  1-0 

- 

1 

2 

2 

Indexed  1-0 

- 

- 

2 

SDRT-V£RGF 

- 

- 

1 

2 

REPORT  WRITER 

- 

- 

- 

- 

SEGMENTATION 

- 

1 

1 

2 

LIBRARY 

- 

1 

1 

2 

DEBUG 

- 

1 

2 

2 

INTER-PRC  C-RAm 

COMMUNICATION 

- 

1 

2 

2 

COMMUNICATION 

2 

2 

1.5.2  Conformance  to  Federal  Standard  COBOL 

A compiler  implemented  in  conformance  to  Federal  Standard  COBOL  must  meet  at 
least  the  following  requ  i r erneo t s . 

a.  The  implementation  must  include  all  of  the  lanouaoe  elements  of  at 
least  one  of  the  levels  of  federal  Standard  COBOL. 

b.  The  implementation  must  meet  all  of  the  requirements  defined  in 
American  '.ational  Standard  COBOL*  X?. 23-1974*  Section  1*  paragraph  1.5*  Defini- 
tion of  An  Implementation  of  American  National  Standard  COBOL  which  is  pro- 
vided in  section  1.4  of  this  VSR. 

c.  The  implementation  must  provide  a facility  for  the  user  to  optionally 
specify  a level  of  Federal  Standard  COBOL  for  monitorino  his  source  program 

at  compile  time.  The  monitoring  will  be  an  analysis  of  the  syntax  used  in  a 
source  program,  aoainst  the  syntax  included  in  the  specified  level  of  federal 
Standard  COBOL.  Any  syntax  used  in  the  source  program  that  does  not  conform 
to  that  allowed  by  the  user  selected  level  of  Federal  Standard  COBOL  will  be 
diagnosed.  The  syntax  diagnosed  as  not  conformino  to  the  specified  level  will 
be  identified  to  the  user  through  a diagnostic  messaqe  on  the  source  proaram 
listing.  The  diannostic  messaqe  will  contain*  at  least:  (1)  The  identification 
of  the  source  prooram  line  number  in  which  the  nonconforming  syntai  occurs* 

(2)  the  identification  of  the  level  of  Federal  Standard  CD30L  that  supports 
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the  syntax  or  that  the  syntax  is  nonstandard  COBOL. 

1.6.  Use  of  the  VSR 

The  Federal  COBOL  Compiler  Testing  Service  may  make  full  and  free  public 
disclosure  cf  the  Validation  Summary  Report  (VSR)  in  accordance  with  the 
"Freedom  of  Information  Act"  (S  U.S.C.  #552).  The  results  of  the  validation 
are  only  for  the  purpose  of  satisfying  United  States  Government  requirements, 
and  apply  only  to  the  computer  system,  operating  system  release,  and  compiler 
version  identified  in  the  VSR. 

The  COBOL  Compiler  Validation  System  is  used  to  determine,  insofar  as  is 
practical,  the  degree  to  which  the  subject  compiler  conforms  to  the  COBOL 
Standard.  Thus,  the  VSR  is  necessarily  discretionary  and  judnmental.  The 
United  States  Government  does  not  represent  or  warrant  that  the  statements, 
or  any  one  of  them,  set  forth  in  the  VSR  are  accurate  or  complete.  The  VSR 
is  not  meant  to  be  used  for  the  purpose  of  publicizing  the  findings  summarized 
therein. 

1.7  Sources  of  Additional  Information 

FIPS  PUB  21-1  defines  the  Federal  COBOL  Lanquage  Standard.  This  publication 
is  available  from  the  Office  of  ADP  Standards  Management.  National  Bureau  of 
Standards.  Washington.  0.  C..  20234. 

The  detailed  COBOL  language  specifications  are  given  in  the  publication 
"American  National  Standard  Programming  lanpuaoe  COBOL.  Y 3. 23-1974".  available 
from  the  American  National  Standards  Institute.  1430  Broadway.  New  York.  New 
York  1001£. 

An  explanation  of  the  COBOL  Compiler  Validation  System  is  contained  in  the 
CCVS  User's  Guide.  This  document  explains  how  to  run  the  compiler  validation 
system.  The  User's  Guide  and  a magnetic  tape  containing  a copy  of  the  CCVS 
programs  are  available  from  the  National  Technical  Information  Service. 
Springfield.  Virginia.  22151.  (Ordering  information  can  he  obtained  from 
the  Federal  COBOL  Compiler  Testing  Service.) 

I.b  Requests  for  Interpretation 

Questions  regarding  this  VSR  or  the  CCVS  in  general  should  be  forwarded  to  the 
FCCTS.  If  any  problem  cannot  be  adequately  resolved  through  the  FCCTS.  the 
request  for  i nt er pr e t a t ion  will  be  forwarded  to  the  Federal  COBOL  Interpretation 
Committee  for  final  resolution. 

A brochure  descrihino  the  validation  process  includino  the  procedures  for 
requesting  a validation  and  resolution  of  questions  involving  interpretation 
of  the  current  Federal  Standard  is  available  from  the  Department  of  the  Navy. 
Federal  COBOL  Compiler  Testina  Service.  Washington.  D.C.  20376. 

1.9  Federal  Standard  C0P0L  Approved  Interpretation 


The  National  Bureau  of  Standards  published  in  the  Federal  Register  Vol.  41 


CCVS74-VSK1 SO 


So.  179/  September  14/  1976/  an  approved  interpretation  of  federal  Standard 
COBOL  as  pertains  to  the  evaluation  of  arithmetic  expressions  in  the  C 0 * p U T f 
statements.  This  interpretation  states  that  "site  of  the  intermediate  result 
field  is  implementor-defined." 

Since  the  results  of  evaluation  arithmetic  expressions  are  not  predictable/  all 
C OmPUT  t statements  and  IF  state ments  containing  arithmetic  expressions  have 
been  removed  from  the  COFOL  Compiter  Validation  System. 

1.10  Timeliness  of  the  Validation  Summary  Reports 

The  timeliness  of  the  Validation  Summary  Report  is  important.  Compilers 
and  their  related  operating  system  software  are  modified  several  times  a year. 
The  Compiler  Validation  System  used  to  validate  compilers  is  also  updated 
durinq  the  life  of  the  system.  Therefore  to  ensure  that  the  latest  version 
of  both  the  vendor's  compiler  and  the  Validation  System  are  the  latest  offici- 
ally released  versions/  check  with  the: 

Director 

federal  COBOL  Compiler  Testinq  Service 
Department  of  the  Navy 
Washinaton/  D.  C.  20376 
<207)  697-1247 

Please  use  the  Validation  Summary  Report  njmber  of  this  report  yhen 
c or r e spo nd i ng  with  the  Testing  Service. 
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SECTION  2.  DETAILED  EVALUATION  Of  ERRORS. 


This  section  summarizes  the  results  of  the  compilation  and  execution  of  the 
programs  comprising  the  Cr'E0L  Compiler  Validation  System  (CCVS).  The  version 
of  the  CCVS  used  during  this  validation  is  shown  inside  the  front  cover  of  the 
VSR. 

Section  2 is  made  up  of  a variable  number  of  subsections.  The  number  of  sub- 
sections is  dependent  on  the  Level  of  federal  C 0 B 3 L beina  validated.  There  will 
be  a subsection  for  each  level  of  each  module  which  is  validated.  If  the  high 
level  of  a module  is  validatef  then  there  will  be  two  subsections  for  that 
module;  one  for  the  low  level  and  one  for  the  high  level. 

A validation  of  the  low  level  of  Federal  Standard  COHOL  would  result  in  three 
subsections  being  present.  One  for  Nucleus  level  1>  one  for  Sequential  1-0 
level  1m  and  one  for  Table  Handling  level  1. 

Each  error  or  deviation  noted  in  this  section  makes  reference  to  a program  or 
functional  COBOL  module  contained  in  Appendix  A (Validation  Summary  Working 
Document).  This  reference  provides  the  documented  results  of  an  occurrence 
of  errors/deviataions  detected  durino  the  runnino  of  the  CCVS  using  the  compiler 
within  the  environment  identified  within  this  document.  The  Validation  Summary 
Working  Document  is  presented  in  sequence  by  functional  module*  functional 
module  level  and  prooram  number  as  defined  below. 

Each  prooram  in  the  COBOL  Compiler  Validation  System  is  identified  by  a 5- 
character  prooram  name.  The  name  associates  the  routine  with  the  functional 
processing  module  and  level  of  American  National  Standard  Program m ing  Lanouaoe 
COBOL  tested  within  the  prooram. 

The  five  character  name  has  the  oeneral  format  XX  N f * . The  first  two 
characters  are  alphabetic  and  identify  the  functional  module  tested  by 

I the  program.  The  permissable  values  are: 

CP  - C ommun i c a t i on 
DB  - Debug 

IC  - I n t e r -Pro or a « C ommun i c a t i on 

IX  - Indexed  1-0 

LB  - Library 

NC  - Nucleus 

RL  - Relative  1-0 

RP  - Report  Writer 

SG  - Seament  at  ion 

S3  - Sequential  1-0 

ST  - Sort-Peroe 

TH  - Table  Handling 

The  third  character  of  thp  audit  routine  name  is  either  a 1 or  ?*  and 
identifies  the  level  of  the  functional  module  being  tested.  Each  module  and 
level  is  represented  by  several  programs.  The  fourth  and  fifth  characters  of 
the  prooram  name  are  sequence  numbers  for  programs  which  test  features  in  the 
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some  level  of  the  same  functional  processing  module. 

As  an  example*  the  pro o ram.  name  *>'  C 7 1 0 is  the  tenth  program  in  the  series  of 
routines  which  test  the  second  level  of  the  Nucleus  module. 


Description  of  Section  2. 

Each  error/deviation  is  noted  by  number  in  the  left  hand  margin  opposite 
the  lannuage  element  in  Question.  This  number  is  used  in  section  3 to 
categorize  errors  by  federal  level  (See  1.5.1).  Inserted  directly  below 
the  language  element  is  a brief  description  of  thp  error.  To  the  riaht  of 
the  lanpauae  element  is  a page  reference  to  X3. 23-1974*  American  National 
Standard  Programming  Language  COBOL.  The  reference  at  the  end  of  the 
description  of  the  error  is  to  Appendix  A which  contains  the  detailed 
information  collected  during  the  validation.  The  reference  is  made  up 
of  the  routine  name  followed  by  an  A or  B (A  for  compile  time  or  syntax 
error  and  B for  execution  time  or  semantic  error)  and  a number  which  makes 
the  error  unique  in  Appendix  A. 
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Example: 

2.1  Sucleus  Level  1 


Operational  symbols:  S V P 11-21 

2.1.9  

* The  seal ina  character  *P*  is  not  permitted  in  a 

* PICTURE  character-string. 

* (NC101.A.2) 


2.2  Sequential  1-0  Level  1 


2.1.9  represents  the  ninth  error  for  Nucleus  Level  1 

11-21  represents  the  page  in  XS. 23-1979  where  the  language 
element  is  defined 

* Poxes  the  description  of  the  error/deviation 


SC101.A.2  represents: 


Fronram  name 
Syntax  error 
second  error 


NC1D1 

A 

2 
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NUCLEUS  LEVEL  1 

Lanouaoe  Concepts  ................ 

Characters  used  tor  words  ........... 

0/  1/  . . . / 9 
A r 3 r • • ■ r l 
- (hyphen  or  minus) 

Characters  used  for  punctuation  ........ 

" quotation  mart 
( left  parenthesis 
) riqht  parenthesis 
. period 
space 

= equal  si  on 

Characters  used  in  editino.  .......... 

B space 

0 zero 

♦ plus 
minus 

CR  credit 
DP  debit 

1 tero  suppress 

* check  protect 
I currency  siqn 
r comma 

. period 
/ stroke 

Separators.  .................. 

The  separators/  semicolon  and  comma/  are  not 
allowed  .................. 

Char ac  ter-st  ri nas  ............... 

C^bOL  words . . . . . . . . . 

Not  more  than  30  characters 

User-defined  words.  ............ 

data-naire 

.'■ust  begin  with  an  alphabetic  character 
*ust  be  unique;  may  not  be  qualified.  . 
level- number 
mnemon i c -n  ame 
paraoraph-name 
prooram-name 
rout ine-name 
sect  ion-name 

System-names.  ............... 

computer-name 

implem.entor-name 

lanouaue-name 

Reserved  words.  .............. 

Key  words 
Opt ional  words 

Fiaurative  constants.  .......... 
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SPACE 

HIGH -VALUE 

LOW-VALUE 

QUOTE 

Special-character  words  .........  I-hO 

Literals 1-80 


Norinumeric  literals  have  lengths  from  1 
through  120  characters 

Numeric  literals  have  lengths  from  1 throjgh 


1ft  diqi t s 

PICTURE  character-strings  ..........  1-82 

Comment-entries  . . . . . . . . . . . . . . . I -ft? 

Reference  Format.  . . . . . . . . . . . . . . . . 1-105 

Sequence  number  . . . . . . . . . . . . . . . . 1-105 

Area  A.  ....................  1-105 

Division  header  ...............  1-106 

Section  header.  ...............  1-106 

Paragraph  header.  ..............  1-107 

Data  Division  entries  . . . . 1-107 

Area  B 1-105 

Paragraphs.  .................  1-107 

Data  Division  entries  ............  1-107 

Continuation  of  lines  .............  1-106 

Only  nonnumeric  literals  may  be  continued  . . 11-1 

Comment  lines  .................  1-108 

Asterisk  (*)  comment  lines 
Stroke  (/)  comment  line 

Identification  Division  .............  1-94 

The  PROGRAP-ID  paragraph.  . . . . . . . . . . . 11-3 

The  AUTHOR  paragraph.  . . . . . . . . . . . . . II-2 

The  INSTALLATION  paragraph.  ..........  II-2 

The  DATE-WRITTEN  paragraph.  ..........  11-2 

The  SECURITY  paraarar.  h.  . . . . . . . . . . . . 11-2 

Environment  Division.  ..............  I -°  5 

The  SOURCE-COftPUTER  paragraph  11-5 

comput  er -n  a«e 

The  OBJECT -COMPUTER  paragraph  11-6 

computer-name 
WE  KORY  SHE  clause 
PROGRA*  COLLATING  SEQUENCE  clause 

2.1.1  


* Compilation  of  a PR0GRAW  COLLATING  SEQUENCE  clause 

* resulted  in  incorrect  code  generation. 

* (NC214  A) 


The  SPEC  I AL-NAftE S paragraph I I -8 

i » pi eme n t o r- na me  IS  mn emo n i c- n ame 
implementor-name  IS  one  mo n i c -na » e series 
ON  STATUS 
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0 F f STATUS 

7.1.2  - - - 

* Switches  are  not  supported. 

* (NUCLFUS) 


a l phabe t -name  clause 
CURRENCY  SIGN  clause 
DECIMAL-POINT  clause 


Data  Division  ..................  1-97 

Work ing-St orage  Section  ............  11-11 

The  data  description  entry.  ..........  11-12 

The  BLANC  WHEN  ZERO  clause 11-14 

The  data-naac  or  FILLER  clause.  ........  11-15 

The  JUSTIFIED  clause  (may  be  abbreviated  JUST).  11-16 

lev e l -nuaber . 11-17 

01  throuah  10  (level  numbers  must  be  2 digits)  11—13 

77 11-11 

The  PICTURE  clause  (may  be  abbreviated  PIC)  . . 11-18 

Character-string  may  contain  30  characters.  . 11-18 

Data  characters:  A X 9 . . . . . . . . . . . 11-18 

Operational  symbols:  S V P . . . . . . . . 11-21 

Fixed  insertion  characters.  .........  11-21 

0 (may  be  used  only  in  edited  items) 


B (may  be  used  only  in  edited  items) 

S ( currency  s i gn) 

* and  - 
DB  and  CR 
/ 

Replacement  or  floating  characters 11-21 

t (currency  sion) 

♦ and  - 
l 


Currency  siqn  substitution.  .........  11-21 

Decimal  point  substitution.  .........  11-21 

The  REOEFINFS  clause  (may  not  be  nested).  ...  11-27 

The  SIGN  clause 11-31 

The  SYNCHRONIZED  clause  (may  be  abgreviated  SYNC)  11-33 

The  USAGE  clause 11-35 

COMPUTATIONAL  (may  be  abbreviated  COMP) 

DISPLAY 

The  VALUE  clause 11-36 

literal 

Procedure  Division.  ...............  1-99 

Conditional  expressions  ............  1 1 — A l 

Simple  condition.  ..............  11-41 

Relation  condition.  ............  11-41 

Relational  operators 
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[NOT]  GRFATFR  THAN 

[not:  less  than 
[NOT]  EQUAL  TO 

Comparison  of  numeric  operands.  .....  11-42 

Comparison  of  nonnumeric  operands  (oper- 
ands must  He  of  equal  size)  .....  11-42 

Class  condition  ..............  11-43 

NOT  option 

Switch-status  condition  ..........  11-44 

2.1.3  - 

* Switches  are  not  supported. 


* (See  2.1.2) 


The  arithmetic  statements  ...........  11-51 

Arithmetic  operands  limited  to  IS  digits 
Overlapping  operands.  .............  11-51 

The  ACCEPT  statement  (only  one  transfer  of  data)  11-53 
The  ADD  statement  ...............  11-55 


i dent i f i er/ l i t e ra  l series 
TO  identifier 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  phr  ase 

The  ALTER  statement  (only  one  procedure-name).  . 11-57 

The  DISPLAY  statement  (only  one  transfer  of  data)  11-59 


* DISPLAYinn  numeric  data  (both  numeric  data  items  and 

* the  numeric  data  within  an  alphanumeric  data  item)  resulted 

* in  commas  <*/*)  being  inserted  and  leading  zeros  beina 

* truncated/  e.g.z  0123450789  was  displayed  as  123/456/789. 

* (NC109  P) 


The  DIVIDF  statement  ..............  11-61 

INTO  identifier 
BY  identifier/literal 
GIVING  identifier 


ROUNDED  phrase 
SIZE  ERROR  phrase 

The  ENTER  statement  ...............  11-63 

The  EXIT  statement  ...............  11-64 


The  GO  TO  statement  ( p r o c edu r e -n ame  is  required)  11-65 
DEPENDING  IN  phrase 

The  IF  statement  (statements  must  be  imperative)  11-66 
ELSE  phrase 

The  INSPECT  statement  (only  single  character 

data  item)  .................  11-68 

TALLYING  phrase 
»LL 

LEADING 
CHARACTERS 
REPLACING  phrase 
ALL 
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LEADING 

FIRST 

CHARACTERS 

TALLYING  and  REPLACING  phrases 


The  "OV  E state  rent  ■ . . . . . . . . . . . . . . 11-74 

TO  identifier 
identifier  series 

The  MULTIPLY  statement  11-77 

BY  identifier 
GIVING  identifier 
ROJNDED  phrase 
SIZE  EPPCR  phrase 

The  PERFORM  statement.  . . . . . . . . . . . . . 11-78 

procedure-name 
THRU  phrase 
TIA.ES  phrase 

The  STOP  statement  ...............  II-E5 

literal 

RUN 

The  SUBTRACT  statement  II-»° 


i den t i f i er / l i t er a l series 
FROM  i dent  i f i e r 
GIVING  identifier 
ROUNDED  phrase 
SIZE  ERROR  phrase 
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2.2  NUCLEUS  LE  Vc  L 2 

All  elements  of  1 NUC  1*2  are  a part  of  2 N U C 1*2 


Language  Concepts.  ...................  1-75 

Characters  used  for  punctuation.  ...........  1-65 

* comma 

; semicolon 

Characters  used  for  arithmetic  operations.  ......  1-52 


* add i t ion 

- subtraction 

* multiplication 

/ division 

* * exponentiation 


Characters  used  in  relations  .............  1-66 

= equal  to 

> greater  than 

< less  than 

Separators  ......................  1-75 

The  separators*  semicolon  and  comma*  are  allowed  . . 1 1 -1 

Character-strings.  ..................  1-76 

COBOL  words.  ....................  1-76 

User-defined  words  ................  1-76 

condition-name 
dat  a -name 

Need  not  begin  with  an  alphabetic  character.  . 1 1 — 1 

•ay  be  qualified  if  necessary  for  uniqueness  . 1 1 — 1 

Reserved  words  ..................  1-79 

Figurative  constants  ..............  1-83 


ZEROS;  ZEROES 

SPACES 

HIGH-VALUES 

LOW-VALUES 

QUOTES 

ALL  literal 


Connectives.  ..................  1-79 

Qualifier  connectives:  Of*  IN 

Series  connectives:  * (separator  comma) 

and  ; (separator  semicolon) 

Logical  connectives:  AND*  OR*  AND  NOT*  OR  NOT 

Qualification.  ....................  1-87 

Reference  format  ..............  1-105 

Continuation  of  lines  (continuation  of  words  and 

numeric  literals  is  allowed)  ...........  II-1 

Identification  Division.  . . . . . . . . . . . . . . . . 1-94 

The  DATE-COMPILED  paragraph 1 1 -4 

Environment  Division 

The  SPE C I A L- N A HE S paragraph.  .............  11-8 

a l phabet -name  clause 
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literal 

Data  Division.  .....................  1-97 

The  data  description  entry  ....  .....  11-1? 

Level-number  .....................  11-17 

01  throuah  49  ( l ev  e l - nj  mt-er  s may  be  1 or  ? dipits)  . 

66 

88 

The  REDEFINES  clause  (may  be  nested)  .........  II-?7 

The  R E R A e E s clause  (may  be  nested)  . . . . . . . . . . ll-?9 

dat  a-name 

data-name  THRU  data-name 

The  VALUE  clause 11-36 

literal-1*  literal-? 
literal-1  THRU  literal-? 
literal  range  series 

Procedure  Division  ...  ...  ..............  1-99 

Arithmetic  expressions  ................  11-39 

Conditional  expressions.  ...............  11-41 

Simple  condition  ..................  11-41 

Relational  condition  ...............  11-41 

Relational  operators 
[ROT]  = 

[ROT]  > 

[ROT]  < 

Comparison  of  nonnumeric  operands  (operands  ol 

unequal  size  are  allowed).  . . . . . . . . . 11-4? 

Condition-name  condition  .............  11-44 

Sion  condition  . . . . . . . . . . . . . . . . . . 11-44 

ROT  option 

Complex  condition.  .................  11-45 

Logical  operators  AND*  OR*  and  NOT 

Negated  simple  condition  .............  11-46 

Combined  and  negated  combined  conditions  .....  11-46 

Abbreviated  combined  relation  condition.  ......  11-47 

Multiple  results  in  arithmetic  statements.  ......  11-51 

The  ACCEPT  statement  (no  restrictions  on  the  number 

of  transfers  of  data).  ..............  11-53 

F ROfl  phrase 


• An  ACCEPT  identifier  FROm  DAT  statement  resulted  in  the 

• contents  of  identifier  being  one  greater  than  the  correct 

• value  for  Julian  date. 

• ( N C ? 1 4 B) 


The  ADD  statement.  ..................  11-55 

TO  identifier  series 
GIVING  identifier  series 
CORRESPONDING  phrase 

The  ALTER  statement.  .................  11-57 

The  series  option  is  allowed 


CCVS74-VSR180 


The  COMPUTE  statement.  . . . . . . . . . . . . . . . _ 11-58 

identifier  series 
ROUNDED  phrase 
SITE  ERROR  phrase 

The  DISPLAY  statement  (no  restrictions  on  the  number 

of  transfers  of  data).  ..............  11-59 

UPON  phrase 

The  DIVIDE  statement  .................  11-61 

INTO  identifier  series 
GIVING  identifier  series 

remainder  phrase 

The  GO  TO  statement  (procedure-name  may  be  omitted).  . 11-65 

The  IF  statement  (nested  statements)  . . . . . . . . . 11-66 

The  INSPECT  statement  ( mu  1 1 i - c h a r a c t e r data  items)  . . 11-68 

series 

2.2.2  - 


* The  compiler  did  not  execute  correctly  an  INSPECT  statement 
« containing  multi-character  operands  with  TALLYING  on  four 

* oterands  and  REPLACING  on  si«  operands. 

* (NC216  P) 


The  ROVE  statenent  ..................  11-74 

CORRESPONDING  phrase 

The  MULTIPLY  statement  . . . . . . . . . . . . . . . . 11-77 

BY  identifier  series 
GIVING  identifier  series 

The  PFRE0R8  statement 11-78 

UNTIL  phrase 
VARYING  phrase 

The  STRING  statement  .................  11-86 

DELIMITED  series 
POINTER  phrase 
ON  OVERFLOW  Phrase 

The  SUBTRACT  statement  11-89 

FROM  ifentifier  series 
GIVING  identifier  series 
CORRESPONDING  phrase 

The  UNSTRING  statement  . . . . . . . . . . . 11-91 

DFLI1I TED  BY  phrase 
POINTER  phrase 
TALLYING  phrase 
ON  OVERFLOW  phrase 
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2.3  TARLE  HANDLING  LEVEL  1 


Languace  Concents 

User-defined  words.  ...............  1-76 

inde  x-name 

Subscripting  - 3 levels  1-89 

Indexing  - 3 levels  ...............  1-89 

Data  Division 

The  OCCURS  clause Ill -2 

integer  TIKES 

INDEXED  BY  index-nair. e series 

The  USAGE  IS  INDEX  clause 1 1 I -5 

Procedure  Division 

Relation  conditions  ...............  1 1 1 — 6 

Comparisons  involving  index-names  and/or 
index  data  it  ems 

Overlapping  operands.  ..............  1 1 I — 6 

The  SET  statement  ................  III-1T 

i nde x -na me / i de n t i f i e r series 
index-name 

UP  BY  i den t i f i e r / i nt eoe r 
DOWN  BY  i de n t i f i e r / i n t eg e r 
index-name  series 
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.4  TAPLE  HANDLING  LEVEL  2 

All  elements  of  1 TPL  1*2  are  a part  of  2 TPL  1*2 
Data  Division 

The  OCCURS  clause IIJ-2 

int  eger-1  TO  inteoer-2  DEPENDING  ON  data-name 
ASCENDING/DESCEND1NG  cata-name 
data-name  series 
ASCENDING/DESCENDING  series 


Procedure  Division 

The  SEARCH  statement 111-7 

VARYING  phrase 
AT  END  phrase 
WHEN  phrase 

The  SEARCH  ALL  statement III-7 

AT  END  phrase 
WHFN  phrase 
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2.5  St  GUI  M I AL  1-0  It  Vt  L 1 


t . n user  Concepts 

llser-det tried  words  . 1-76 

t i lf-n  ire 
record-name 

1-0  status  ......................  I V - 1 

Environment  Division 

The  f ILE-CON'TwOL  paragraph IV-A 

The  tile  control  entry  ................  IV-4 

Sf IF  C T c lause 


ASSIGN  TO  implementor-name  clause 
ORGANISATION  IS  SEGUENTIAL  clause 
ACCFSS  V3DE  IS  SfGUTNTI AL  clause 
FILE  STATUS  clause 

The  I -0-C ON T ROL  paragraph.  ..............  I V - 6 

RERUN  clause 
SAi"E  AREA  clause 
SANE  AREA  series 


Data  Division 

File  Section  ...........  IV-9 

The  tile  description  entry  ..............  IV-1C 

The  record  description  entry  .............  IV-9 

The  BLOCK  CONTAINS  clause IV-11 

integer  CHARACTERS 
integer  RECORDS 

The  CODE-SET  clause IV-12 


2.5.1 

2.5.2 


* The  compiler  does  not  accept  the  "CODE-SET  IS  alphabet- 

* name"  clause  it  the  optional  word  'IS'  is  missinq. 

* (SSII"  A . 1 ) 


» The  compiler  required  a non-standard  clause  (RFC0RD1N6  "ODE 

* IS  STANDARD-ASCII)  in  order  to  process  tape  tiles  in 

* accordance  w i t h the  American  National  Standard  Code  tor 

* Intormation  Interchange. 

« ( SO1 1 F A. 2) 


The  DATA  RECORDS  clause 


IV-1  J 


dat  a-name 
data-name  series 


The  LABEl  RECORDS  clause  IV-1A 

STANDARD 

OMITTED 

The  RECORD  CONTAINS  clause  IV-1F 

inteqer-1  TO  inteqer-?  CHARACTERS 

The  VALUE  OF  clause IV-19 

imp l emen t or -name  IS  literal 


imp l emen t o r- name  IS  literal  series 
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Procedure  Division 

The  CLOSE  statement  (only  a sinole  file-name  may  appear 


in  a CLOSE  statement).  .............  IV-20 

RE  EL 
DMT 

The  OPEN  statement  (only  a single  file-name  may  appear 

in  an  OPEN  statement).  . . . . . . . . . . . . . I V - 2 4 
INPUT 
OUTPUT 
1-0 

T h e R F A D statement  . . . . . . . . . . . . . . . . . . 1 V - 2 8 

INTO  identifier 
AT  END  phrase 

2.5.3 - — 


* The  compiler  requires  the  AT  END  clause  for  READ  statements 

* even  though  a declarative  procedure  for  USE  on  1-0  was 

* included  in  the  proqram. 

* (SQ121  A) 


The  REWRITE  statement.  . . . 
FRom  identifier 

The  USE  statement 

EXCEPTION/ERROR  PROCEDURE 
ON  file -name 
ON  INPUT 
ON  OUTPUT 
ON  1-0 

The  WRITE  statement  . . . . . 
F R OP.  identifier 
BEFORE/AFTER  integer  LINES 


Omission  of  the  ADVANCING  phrase  in  WRITE  statements  resulted 
in  a default  value  of  BEFORE  1 LINE  instead  of  the  correct 
value  of  AFTER  1 LINE. 

( SO  1 01  P) 


3EFCRE/AFTER  PAGE 


IV-31 
I V-  3? 

I V- 34 
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2.6  SEQUENTIAL  1-0  LFVEL  2 

All  elements  of  1 SEQ  1*2  are  a part  of  2 SFQ  1*2 


Language  Concepts 

Special  register  ..................  1-80 

LINAGE-COUNTER IV-3 

Envirornent  Division 

The  FILE-CONTROL  paragraph  1V-4 

The  file  control  entry  . . . . . . . . . . . . . . . I V - 4 

SFLECT  clause 

OPTIONAL  phrase 

RESERVE  integer  A P FACS)  clause 

The  I-0-C0NTR1L  paragraph.  . . . . . . . . . . . . . IV-6 
SAP, E RECORD  AREA  clause 
SANE  RECORD  AREA  series 
MULTIPLE  FILE  TAPE  clause 


Data  Division 

The  file  description  entry.  .............  IV-10 

The  BLOCK  CONTAINS  clause I V - 1 1 

inteaer-1  TO  integer-2  RECORDS 
integer-1  TO  inteoer-2  CHARACTERS 

The  LINAGE  clause  . . . . . . . . . . . . . . . . . . IV -IS 

FOOTING  phrase 
TOP  phrase 
BOTTOM  phrase 

The  VALUE  OF  clause  .................  IV-19 

implementor-name  IS  data-name 
i mp l emen t o r- na me  IS  data-name  series 

Procedure  Division 

The  CLOSE  statement  .................  IV-20 

NO  REWIND*  REMOVAL*  or  LOCK 
file -name  series 

The  OPEN  statement.  .................  I V - 2 4 


INPUT 

REVFRSEC 
NO  REWIND 
OUTPUT 

NO  REWIND 
EXTEND 

file -name  series 

INPUT*  OUTPUT*  1-0,  and  EXTEND  series 


The  USE  statement IV-32 

EXCEPT 10N/EPROR  PROCEDURE  ON  file-name  series 
EXCEPTICN/FRROR  PROCEDURE  ON  EXTEND 
The  WRITE  statement  . . . . . . . . . . . . . . . . . I V - 3 4 
PEFORE/AFTFR  identifier  LINFS 
BEFOREAAFTFR  mnemon i c -name 
AT  FNO-OF-PAGE  i mp e r a t i ve -s t a t emen t 
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2.7  RELATIVE  1-0  LEVEL  1 


Language  Concepts 

Use r -de f i ned  words.  .................  1-76 

f i le-name 
record-name 

I -0  status.  ......  ......  V-2 

Environment  Division 

The  FILE-CONTROL  paragraph.  .............  V-5 

The  tile  control  entry.  ...............  V-5 

SELECT  clause 


ASSIGN  TO  i m p t emen t o r -na m e clause 
ORGANIZATION  IS  RELATIVE  clause 
ACCESS  MODE  clause 
SEQUENTIAL 
RANDOM 

FILE  STATUS  clause 

The  I-O-CONTROL  paragraph  . . . . . . . . . . . . . . V - 7 

RE  RUN  clause 
SAME  APEA  clause 
SAME  AREA  series 


Data  Division 

File  Section.  ....................  V-10 

The  file  description  entry.  .............  V-11 

The  record  description  entry.  ............  V-10 

The  BLOCK  CONTAINS  clause  V-12 

integer  CHARACTERS 
integer  RECORDS 

The  DATA  RECORDS  clause V-13 

dat  a-name 

da  t a-name  series 

The  LABEL  RECORDS  clause V-14 

STANDARD 

OMITTED 

The  RECORD  CONTAINS  clause V-15 

irteger-1  TO  inteoer-2  CHARACTERS 

The  VALUE  OF  clause V-16 

i »p l ement or -name  IS  literal 


i mp l emen t or-na me  IS  literal  series 


Procedure  Division 

The  CLOSE  statement  .................  V-17 

WITH  LOCK 

file -name  series 

The  DELETE  statement V-19 

INVALID  KET  phrase 

The  OPEN  statement.  .................  V-20 

INPUT 
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OUTPUT 

1-0 

file -name  series 

INPUT*  OUTPUT*  and  1-0  series 


The  READ  statement.  . . . . . . . . . . . . . . . _ . V - 2 3 
INTO  identifier 
AT  END  phrase 
INVALID  KEY  phrase 

The  REWRITE  statement  . . . . . . . . . . . . . . . . V- 2 6 
FRO11!  identifier 
INVALID  KEY  phrase 

The  USE  statement V-30 


EXCEPTION/ERROR  PROCEDURE 
ON  f i l e-name 
ON  INPUT 
ON  OUTPUT 
ON  1-0 

The  WRITE  statement V-32 

FROM  identifier 
INVALID  KEY  phrase 
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?.8  RELATIVE  1-0  LEVEL  ? 

All  elements  oE  1 REL  Or?  are  a part  of  2 Rl  L 0 r2 
Environment  Division 

The  f 1LE-C0MR0L  paragraph.  ......... 

The  file  control  entry.  ........... 

SFLECT  clause 

RESERVE  integer  AREA(S)  clause 
ACCESS  •'ODE  is  DYNAMIC  clause 
The  1-O-CONTROL  paragraph  . . . . . . . . . . 
SAKE  RECORD  AREA 
SAKE  RECORD  AREA  entries 

Data  Division 

The  file  description  entry.  ......... 

The  FLOCK  CONTAINS  clause  

integer-1  TO  integer-?  RECORDS 
integer-1  TO  integer-?  CHARACTERS 
The  VALUE  OF  clause  ............. 

implementor-name  IS  data-name 
i r.  pie  mentor-name  IS  data-name  entries 

Procedure  Division 

The  READ  statement.  ............. 

neat  record 

The  START  statement  ............. 

KEY  IS  phrase 
INVALID  KEY  phrase 

The  USE  statement  ......... 

EXCEPTION/ERROR  PROCEDURE 
ON  file-name  series 


V -5 
V-  5 


V-7 


V-11 

V-1? 

V-1  6 

V-23 

V-28 


V-30 
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2.9  INDEXED  1-0  LEVEL  1 


Lannuaoe  Concept  s 

User-defined  words.  . . . . . . . . . . . . . „ . . . 1-76 

f i le-name 
re  cord-name 

1-0  status.  .....................  VI -2 

Environment  division 

The  FILE-CONTROL  paragraph.  .............  VI-5 

The  file  control  entry.  ...............  VI-5 

SELECT  clause 


ASSIGN  TO  implementor-name  clause 


The  compiler  requires  the  ASSIGN  clause  to  immediately  follow 
the  SELECT  clause  in  a file  control  entry. 

(1X2D7  A. 2) 


ORGANIZATION  is  INDEXED  clause 
ACCESS  NODE  clause 
SEQUENTIAL 
RANDOM 

RECORD  KEY  clause 
FILE  STATUS  clause 

The  l-O-CONTROL  paragraph  ..............  VI-R 

RERUN  clause 
SA'-'.E  AREA  clause 
SAME  AREA  series 


Data  Division 

File  Section VI-11 

The  file  description  entry.  .............  VI-1? 

The  record  description  entry.  ............  VI-11 

The  PLOCK  C ON T A I N S c l aus e Vl-13 

integer  CHARACTERS 
integer  RECORDS 

The  DATA  RECORDS  clause VI-14 

data-name 

data -name  series 

The  LAPEL  RECORDS  clause Vl-15 

• STANDARD 
OMITTED 

The  RECORD  CONTAINS  clause VI-16 

integer-1  TO  integer-?  CHARACTERS 

The  VALUE  OF  clause VI-17 

implementor-name  IS  literal 
i mp l emen t or -name  IS  literal  series 

Procedure  Division 

The  CLOSE  statement  .................  VI-1S 

WITH  LOCK 
f i le -name  series 
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The  DELETE  statement VI-20 

INVALID  KEY  phrase 

The  CPf  N statement.  . . . . . . . . . . . . . . . . . VI-21 

INPUT 
OUTPUT 
1-0 

file-name  series 


INPUT,  OUTPUT,  and  I -0  series 


The  RFAD  statement.  .................  VI-24 

INTO  identifier 
AT  FND  phrase 
INVALID  KEY  phrase 

The  REWRITE  statement VI-28 

FKOd  identifier 
INVALID  KEY  phrase 

The  USE  statement  ..................  VI-32 


EXCEPTION/ERROR  PROCEDURE 
ON  file-name 
ON  INPUT 
ON  OUTPUT 
ON  1-0 

The  WRITE  statement  .................  VI-33 

FRO  K identifier 
INVALID  KEY  phrase 
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2.10  INDEXED  1-0  LEVEL  2 

All  elements  of  1 1NX  0/2  are  a part  of  2 1NX  0/2 


Environment  division 

The  FILE-CONTROL  paragraph VI-5 

The  file  control  entry  ................  VI-5 

SELECT  clajse 


RESERVE  intener  ARE  A ( S)  clause 
ACCESS  MODE  IS  DYNAMIC  clause 
ALTERNATE  RECORD  KEY  clause 

2.10.1 

* The  ALTERNATE  RECORD  KEY  clause  is  not  supported. 

« <1X205  A) 


WI TH  DUPLICATES  phrase 

The  I-O-CONTRDL  paranraph.  ..............  VI-8 

SAhE  RECORD  clause 
SAME  RECORD  AREA  series 


Data  Division 

The  file  description  entry . . Vl-12 

The  BLOCK  CONTAINS  clause VI-13 

integer-1  TO  inte-er-2  RECORDS 
inteqer-1  TO  inteaer-2  CHARACTERS 

The  VALUE  OF  clause. VI-17 

imple mentor-name  IS  data-name 
ii  Herentor-nane  IS  data-name  scries 

Procedure  Division 

The  READ  statement  ............  VI-24 

KEY  IS  phrase 
NEXT  RECORD 

The  START  statement VI-30 

KEY  IS  phrase 
INVALID  KEY  phrase 

The  USE  statement.  ..................  VI-32 

EXCEPTION/ERROR  PROCEDURE 
ON  file -name  series 
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2-11  S OK  T- RE  PGE  LEVEL  1 


Language  Concepts 

User- defined  words.  _ . . . . . . . . . . . . - - . . 1-76 

f i l e -n  a me 

Environment  Division 

The  FILE-CONTROL  paragraph.  .............  V 1 1 — 2 

The  file  control  entry.  ...............  V 1 1 — 2 

SELECT  clause 


ASSIGN  TO  implementor-name  clause 


Data  Division 

File  Section.  ....................  VII —5 

The  sort-merqe  file  description  entry  ........  VII-5 

The  DATA  RECORDS  clause VII-6 

The  RECORD  CONTAINS  clause V1I-7 

Procedure  Division 

The  RELEASF  statement  ................  V 1 1 — 1 2 

FROH  phrase 

The  RETURN  statement.  ................  V 1 1 — 1 3 

INTO  phrase 
AT  END  phrase 


The  SORT  statement  (only  one  SORT  statement/  a STOP 
RUN  statement/  and  any  associated  input-output 
procedures  allowed  in  the  nondeclarative 

portion  of  a program)  .............  V1I-14 

KEY  data-nam.e 

data-name  series 
ASCENDING  series 
DESCENDING  series 
mined  A SC F ND I NG/ D E SC E ND I NG 
INPUT  PROCEDURE  phrase 
THR  J 

USING  phrase 
OUTPUT  PROCEDURF  phrase 
THRU 

GIVING  phrase 
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2.12  SORT-MIRGE  LEVEL  2 

All  elements  of  1 SRT  0/2  are  a part  of  2 SET  0/2 


Environment  Division 

The  FILE-CONTROL  paraoraph VII-2 

The  file  control  entry.  ...............  VII-2 

SELECT  clause 

The  I-O-C0NTROL  paragraph  ..............  VII-3 

SA»E  RECORD  AREA  clause 


same  SORT/SORT-MERGE  AREA  clause 
SAME  series 

Procedure  Division 

The  RERGE  statement VII-8 

KET  data- name 

data-name  series 
ASCENDING  series 
DESCENDING  series 
mi*ed  A SC E ND I NG / DE SC E ND ING 
COLLATING  SEQUENCE  phrase 
USING  phrase 
OUTPUT  PROCEDURE  phrase 
THRU 

GIVING  phrase 

The  SORT  statement  (multiple  SORT  statements  are 

permitted).  ..................  VII-14 

COLLATING  SEQUENCE  phrase 
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?.  13  SEG^ENTAT1°K'  LEVEL  1 


Lannuaae  Concepts 

User-defined  words . . 1-76 

segment-number 

Procedure  Division 

Segment  -nj  Tiber  s Ix-A 


Fixed  segment  - nun ber  ranae  0 throuah  40 
Non-fixed  seam  cnt^numt  er  ranae  50  through  99 
Alt  sections  with  the  samp  segment -njuber  fust 
be  toaether  in  the  source  proqram 
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2.14  SEG^ENTAll''’*  LEVEL  2 

All  elements  of  1 SEG  0/2  are  a part  of  2 SE5  3/2 

Environment  Division 

The  OFJECT -COMPUTE  R paraoraph 


SEGMENT-LI^I  T.  IX-5 

Procedure  Division 

Segment-numbers  IX-4 


Sections  with  the  same  segment -number  need  not 

be  physically  contiguous  in  the  source  program 


I 
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6 LIE-RAKY  LEVEL  ? 

Alt  f Unents  of  1 LIU  0/?  are  a part  of  2 LIB  Or? 

Language  Concepts 

User-defined  words  ..............  1-76 

library-name 

All  divisions 

The  COPY  statement  . . . . . . . . . . . . . . X - ? 

OF  library-name 

? . 1 6 . 1 

* The  comDiler  cannot  process  COPY  statements  containing 

* a text-name  qualified  by  a library-name  identifying  the 

_ * COBOL  library  in  which  the  text  resides. 

* ( L P ? 0 7 A) 


REPLACIS3  phrase 
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2.17  DEPUG  LEVEL  1 

2.17.1  

* The  Debug  module  is  not  supported. 

• (DEPUG  v o d u l p ) 


Lanauaoe  Concepts 

Special  reoisters.  .................  1-80 

DEHUG-1TEP XI-1 

Environment  Division 

The  SOURCE -COMPUTE R paraoraph 

U1TH  DEBUGGING  “ODE  clause.  ......  XT-3 

Procedure  Division 

USE  FOR  DEPUGGING  statement XI-4 

procedure-name 

proc edure -na me  series 

XLL  PROCEDURES 

Debuoqinq  lines.  ..................  XI-10 
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2.18  DEBUG  LEVEL  2 

2.1P.1  

* The  Det-ug  Podule  is  not  supported. 

* (See  2.17.1) 


All  elements  ot  1 DEb  0e2  are  a part  o(  2 DEB  0 r2 
Procedure  Division 

USE  FOR  DEBUGGING  statement XI-4 

ALL  REFERENCES  OF  identifier  series 
file-name  series 
cd-name  series 
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2.19  I N T E R -PROG  R A tf  COMMUNICATION  LEVEL  1 


Data  division 

Linkage  Section.  ..  ......  XII-2 

Procedure  Division 

Procedure  Division  header.  ..............  XI1-4, 

USING  phrase 

The  CALL  statement  . . . . . . . . . . . . . , , . . , XI1-5 

literal 

USING  data-name  series 

The  EXIT  PROGRAM  statement  ..............  X I I -8 
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7.20  IKTER- PROGRAM  C OP.NUN 1 C A T I ON  LEVEL  2 

All  elements  of  1 IPC  0*2  are  a part  of  2 IPC  0*2 


Procedure  Division 

The  CALL  statement.  . . . . . . . . . . . . . . . . . XII-5 
ident i f i er 
ON  OVERFLOW  phrase 

The  CANCEL  statement.  ................  x 1 1 — 7 


The  CANCEL  statement.  ................  XII-7 
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SECTION  3.  COMPILER  STATUS 

Section  1.5  explains  the  four  levels  of  Federal  Standard  COPOL.  This 
section  lists  the  discrepancies  described  in  Section  2 by  the  Federal  level 
in  which  the  problem  occurs.  All  errors  listed  for  a lower  level  are  also 
errors  in  any  higher  level#  even  thouph  they  are  listed  only  in  the  lower 
level.  The  paragraph  number  from  Section  2 is  used  to  reference  the  errors 
in  each  Federal  level. 


3.1.  Low  Leve l 

2.1.1  PROGRAM  COLLATING  SEQUENCE  clause  resulted  in  error. 

2.1.2  Switches  are  not  supported. 

2.1.4  DISFLAYed  numeric  data  is  incorrectly  edited. 

7.5.1  Compiler  rejects  C0DF-SF1  IS  ...  clause  w/o  MS'. 

2.5.2  Non-standard  code  required  for  ASCII  C *3. 4 ) tape  files. 

2.5.3  AT  END  clause  reouired  in  READ  statement  for  I -0  file. 

2.5.4  Default  value  of  ADVANCING  phrase  is  not  AFTER  1 LINE. 

3.2.  Low-Intermediate  Level 

2.17.1  Debug  module  is  not  supported. 

3.3.  Hinh-Intermediate 

2.2.1  ACCEPT  identifier  FRnv  DAY  statement  - result  is  one 
greater  than  correct  Julian  date. 

2.2.2  INSPECT  statement  with  mu 1 1 i - c h a r a c t e r operands  and  multiple 
TALLYING  and  REPLACING  operands  did  not  execute  correctly. 

3.4.  Hioh  Level 

2.9.1  ASSIGN  clause  must  immediately  follow  SFLECT  clause  in 
file  control  entry. 

2.1C.1  ALTERNATE  RECORD  KEY  clause  is  not  supported. 

2.16.1  COPY  statement  with  text-name  qualified  by  library-name 
can  not  be  compiled. 
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SECTION  4 SOf  TU'ARF  t N VI  K 0 NME  N T . 

The  compiler  referenced  in  this  document  was  validated  usinn  the  software 
environment  described  in  this  section.  i.  h e n usini  a modification  of  the 
described  environment#  the  compiler  may  or  may  not  continue  to  conform  to  the 
Standard.  It  should  be  noted  th't  durinn  the  validation  process#  an  attempt 
is  made  to  validate  as  many  different  options  as  possible. 

The  use  of  compiler  actions#  implementor-names  in  the  F nvi roncent  Division 
and  any  form  of  optimization  which  is  not  described  in  this  report  could  cause 
the  compiler  to  produce  a program  that  does  not  perform  according  to  the 
specifications  of  Standard  COBOL.  Only  the  environment  described  in  this 
document  has  been  used  with  this  compiler  to  satisfy  the  requirements  of  HPS 
PJB  21-1  and  FPdH  1 01  - 32 . 1 3 05 . 1 a . Uny  deviations  which  must  be  corrected  as 
per  the  referenced  f P 1 R are  described  in  Sections  2 and  3 of  this  report.) 

1.  Options  or  parameters  used  on  the  processor  call  statement  for  the  compiler: 
The  following  options/paraieters  were  used  durinc  the  validation. 


Options  specified: 
None 

Options  defaulted: 
N/A 


2.  Environment  Division  implementor-names. 

Printer  destined  files 
LPT 

T ape  files 
h TA  n 

Sequential  Aass-storage  files 
DSK 

Random  Access  files 
DSL 

Sort  files  (ED) 

DSA^DSArPSK 

Switch  names 
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Not  supported  by  the  compiler. 
Source  Computer  names 
DECSYSTEK-10 
Object  Computer  names 
OECSYSIF'r-10 


3.  Opt i m i 2 a t i on . The  compiler  may  or  may  not  have  optimisation  features. 

If  there  was  an  oo t i m i z a t i on  feature  available/  it  was  used  during  the 
validation  process  (durim  a separate  execution  of  the  Compiler  Validation 
System)  to  determine  if  its  use  causes  the  compiler  to  produce  a program  which 
does  not  give  the  expected  results.  If  the  optimization  is  invoked  through 
the  compiler  call  statement  then  it  is  mentioned  in  paraoraph  1 above.  If 

it  is  invoked  through  the  introduction  of  syntax  in  other  than  the  Data 
and  Procedure  Divisions  of  the  source  proaram  it  is  shovn  below.  Optimization 
which  would  reouire  modification  to  the  Data  and  Procedure  Divisions  is  not 
considered  in  this  renort  in  that  it  is  beyond  the  scope  of  the  use  of 
standard  COBOL  and  the  validation  process. 

Optimization  was  not  considered  for  this  validation. 

4 . Compiler. 

CBL  74  Version  1 

5.  Operating  system. 

TOPS-IO 
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ASCII  Validation 


ASCII  Validation  is  performed  by  running  a sequence  of  three  CCVS74  pro- 
grams (SC IIP*  S G 1 1 9 * S01?U)  using  special  procedures.  The  purpose  of  this 
special  run  is  to  validate  that  in  fact  the  co'piler/operatino  system  beinq 
tested  is  capable  of  processing  an  ASCII  tape  file  and  an  ASCII  card  file  pro- 
duced (in  accordance  with  the  appropriate  American  National  Standard)  on  another 
system.  There  is  also  a magnetic  tape  and  a card  file  created  in  ASCII  dur ir.c 
the  validation  which  will  be  taken  to  another  system  for  further  processino  to 
determine  whether  the  compiler/operating  system  being  tested  can  also  produce 
ASCII  files. 

This  testino  is  tased  on  several  American  National  Standards  and  presumes 
their  sui port  by  the  compiler/operating  system  beinq  validated.  These  are: 

1.  American  National  Standard  Programming  Language  COEOL  X3. 23-1974 


- The  CODE-SET  clause  is  used  to  read  and  write  the  ASCII 
files. 

The  PROGRAM  COLLATING  SFQUFNCE  clause  is  used  to  process  the 
data  in  ASCII  mode  as  welt  as  native  mode. 

- The  SI GN . . . SEP  A R A T E clause  is  used  for  signed  data  and  all 
data  is  in  the  DISPLAY  (character)  mode. 

2.  American  National  Standard  Code  for  Information  Interchange 
(ASCII)  X3. 4-1968.  (Note  that  this  descrites  the  code*  not  the 
labeling  and  tape  recording  formats.) 

3.  American  National  Standard  Hollerith  Punched  Card  Code* 

X3. 26-1070. 

4.  American  National  Standard  magnetic  Tape  Labels  for  Information 
Interchange*  X3. 27-1969. 

5.  American  National  Standard  Recorded  *agnetic  Tape  for  Information 
Interchange  (830  CPI*  N Z R I ) * X3. 23-1967. 

6.  American  National  Standard  Recorded  Magnetic  Tape  for  Information 
Interchange  (1600  CPI*  PR)*  X3. 39-1973. 


The  language  of  the  1974  COPOL  Standard  provides  the  capability  to  accept* 
process*  and  produce  ASCII  code.  The  ASCII  Standard  describes  the  code  insofar 
as  the  bit  arranoement  and  configuration*  but  does  not  address  recording  tech- 
niques* record  formats  or  any  labeling  scheme.  The  POO  CPI*  N7RI  magnetic  tarr 
recording  standard  was  used  to  establish  the  recording  density  anr1  techniaues. 
(1600  CPI*  PE  based  on  XS. 39-1973  "Recorded  Maonetic  Tape  for  Information  Inter- 
ctianoe"  could  be  used  under  special  arrangements.)  The  tape  labelinq  scheme 
used  in  these  tests  is  based  on  x3. 27-1969  but  is  also  compatible  with  the 
revision  to  that  tape  label  standard.  Only  the  V0L1*  HDR1*  and  tOFI  labels  are 
used.  The  records  are  fi»ed  length  and  unblocked. 
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During  the  validation/  the  Validation  Manager  for  the  federal  COQOL  Com- 
piler Testing  Service  would  use  the  necessary  ASCII  magnetic  tape  and  card  filrr 
in  addition  to  the  normal  tape  files  associated  with  a validation.  For  the 
ASCII  portion  of  the  validation  the  following  steps  are  performed: 

1.  The  tape  file  and  card  deck  (produced  on  another  computer  system) 
are  used  as  input  to  several  procrams  desioned  to  validate  whether 
the  system  beino  validated  can  accent  and  process  ASCII  data. 
chances  made  ourim  this  validation  to  the  source  programs  reacir 
the  data  are  noted  below. 

2.  A tape  file  and  card  file  are  produced  during  the  validation  which 
should  prove  to  be  identical  to  the  files  described  in  1 above. 
These  two  files  are  then  processed  on  a different  com.puter  syster 
to  determine  the  decree  to  which  the  system  being  validated  sup- 
ports the  ASCII  standard.  Any  chanqes  made  during  this  validatior 
to  the  source  prooram  producing  the  data  are  noted  below. 

Results  for  this  Validation 

The  system  was  able  to  both  read  and  produce  the  reouired  ASCII  files 
based  on  references  2 and  3 above.  SOG  CPI  N2RI  to  maonetic  tape  was  used 
(reference  5 above).  The  following  modifications  had  to  be  made  in  order  to 
fulfill  the  ASCII  validation  requirement. 

1.  The  tape  labeling  standard  (reference  4 above)  is  not  supported 
by  the  Operation  System  used  during  the  validation.  An  unlabeled 
tape  file  was  used  as  input  and  the  LABEL  RECORDS  clause  in  each 
of  the  source  programs  was  modified  to  reflect  OMTTED  labels. 

2.  The  non-standard  clause  "RECORDING  "ODE  IS  STANDARD  ASCII"  was 
added  to  the  SELECT  statement  of  each  of  the  tape  files  in  order 
to  use  the  ASCII  code  described  in  reference  2 above.  (Note  - 
The  CODE-SET  clause  in  the  File  Description  Entry  which  should 
have  accomplished  this  function  did  not/  thus  the  introduction 
of  the  non-standard  RECORDING  "ODE  clause.) 
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APPENDIX  A 


VALIDATION  SUVdAOY  WORKING  DOCUMENT 


A-1  This  appendix  is  a working  paper  produced  durinq  the  validation 

and  docurrents  thp  results  of  the  compilation  and  execution  of  each  of  the 
programs  comprising  the  CCVS.  The  results  contained  herein  are  based  on 
the  use  of  the  compiler  within  the  Validation  Environment  identified  in 
this  appendix.  This  appendix  (Validation  Summary  Workino  Document)  is  not 
part  of  the  official  Validation  Summary  Report  (VSR)  and  is  not  intended 
to  reflect  in  any  way  the  compiler's  usefulness  or  degree  of  conformance 
to  the  languaoe  specifications. 

The  reader  of  this  appendix  should  krep  in  mind  that  the  same  pro- 
blem area  may  appear  in  nnre  than  one  prooram/  but  is  considered  only  as  one 
single  discrepancy  and  as  such  is  reflected  only  onr  in  the  body  of  the 
VSR.  (The  VSR  will  in  turn  only  reference  the  first  occurrence  of  the 
problem,  in  the  appendix.) 

This  appendix  is  divided  into  two  parts.  The  first  part  describes 
the  Validation  Environment.  The  secrnri  part  of  the  document  is  divided  into 
categories  of  information:  compilation  and  execution  results. 

The  reference  document  for  CdfOL  is  TIPS  PU9  21-1  ( x ? .2 J -1 97k. ) . 
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C T^HILE  k 
C 3KPUIIR 


VALIDATION  FNVIF  ' ‘.F  E N T 

IDENTIFICATION;  DIGITAL  FLUIPFT'T  CORPORATION,  Cf'L7A  VERSION  1 

SYSTFM:  DFCSTSTEr.-IO  MODFL  10RO 


OPERATING  SrSTEN: 


TOFS-IO 
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DEPUC  MODULE 

05101  thru  DPI  05*  DB?01  thru  0P2O4 

the  test  set  for  this  module  uas  not  run  since  the  standard  DEBUG  MODULE 
has  not  been  implemented  in  this  compiler. 
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INTER-PROGRAH  COKNUN1CAUDN,  LEVEL  1 
IC1D1  thru  IC11S,  I C 1 5 1 r IC15? 

A.  Compilation 
No  errors, 
b.  Execution 

No  failures. 
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I'JTEK-FR  0&  R A C OMI'UNl  C A 1 ION,  LEVEL  2 
1 C 201  thru  J C 208 

A . C oirp  i t at  ion 
Ko  errors. 

B.  Execution 


Ko  failures. 
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INDEXED  I-D*  LEVEL  2 
I X 2 U 1 tErii  IX20L 

A . Compilation 
No  errors. 

B.  execution 

No  failures. 

1X205  thru  1x20? 

A.  Compilation 

1.  In  1 X205  through  Ix2r'S»  all  references  to  ALTERNATE  PfCORP 
KEYS  were  rejected  as  "I  A"  PRO  PER  CLAUSES". 

2.  In  1X207*  one  SELECT  clause  is  not  followed  immediately  by 
an  ASSIGN  clause#  but  by  a series  of  the  optional  clauses* 
and  tfen  the  ASSIGN  clause.  This  SELECT  sentence  elicited 
the  fatal  error*  "•ASSIGN’  IS  THE  ONLY  ALLOWFC  WORD  HERE". 

b . E xecut ion 

1X205  through  1x208  were  not  run  because  of  ALTERNATE  KEY  tests 
(not  supported). 
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LlPRARTr  LFVEl  2 
L32C1  thru  LR20S 

A . Compilation 
No  errors. 

P . Execution 

No  failures. 

LB206 

A . Compilation 
No  errors. 

P.  Execution 

LP206  had  one  test  failure  because  that  test  involved  the  use  of 
detuo  lines  which  are  not  supported  by  the  compiler. 

L 3 20  7 

A . Compilation 

The  compiler  aborted  while  compilina  LB207.  The  comfiler  could  not 
handle  qualified  text  names  in  COPT  statements  requirino  the  use 
of  more  than  one  library  at  compile  time. 

B . Execution 

Could  not  run  due  to  compiler  abort. 
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NUCLEUS,  LEVFL  1 


M C 1 0 1 thru  NC1U8 


A . Compilation 

All  references  to  hardware  switches  were  optioned  out  prior  to 
validation  since  the  system  does  not  provide  switches. 

8 . E xe  cut  ion 

No  failures. 


A . Comp  i l a t ion 
No  errors. 

6 . E xecut ion 

All  tests  involving  the  PISPLAYing  of  numeric  data  items  failed.  The 
correct  and  computed  results  are  as  follows: 


CORRECT  RESULTS 


computed  results 


DISP-TEST-3 


0123456789 


173,456,789 


D1SP-TEST-7 


...1C0123456789A... 


...1C173, 456,789*... 


D1SP-TEST-13 


...  E 01 07030405  ... 


...  E 12345 


NC1 1 0 thru  NC 1 20,  NC151  thru  NC165 
A . Compi l at  ion 

All  references  to  hardware  switches  were  optioned  out  prior  to 
validation  since  the  system  does  not  provide  switches. 

B.  Execut ion 


No  f a i lures . 
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NUCLEUS*  LEVEL  2 
NC201  thru  NC21J 

A . Co-pilation 
No  errors. 

6 . fxfcul  ion 

No  failures. 

NC214 

A . Compilation 

In  NC214*  the  construct  set 

OPJE  C T-CO-PUTf R . 

OECSYSTEM-10 

PROGRAM  COLLATING  SEQUENCE  IS  N-A-T-I-V-E. 

SPECIAL-NAMES. 

N-A-T-I-V-E  IS  NATIVE. 

caused  the  compiler  to  oenerate  incorrect  code  which  resulted 
in  errors  durinq  the  subsequent  assembly  phase.  This  caused 
QUO TC - TE S T-4  to  fail  at  execution  tine.  When  the  above  construct 
set  was  modified  to  appear  as: 

OEJECT-COMPUTER. 

DFCSYSTE.M-1D 

PROGRAM  COLLATING  SEQUENCE  IS  NATIVE, 
thus  removing  the  SPE C I A L- N A m E S link*  GUOTE-7EST-4  passed. 

B . E xecut ion 

In  NC214*  the  Julian  date  for  the  day  the  test  was  run  (F  EEB  1977) 
was  incorrectly  shown  as  77040  instead  of  77039  as  eipected.  The 
construct  being  exercised  was  ACCEPT  identifier  ER0M  OAT. 

NC215 

A . Comp i l at  ion 
ho  errors. 

6.  E treat  ion 

No  failures. 

NC  2 1 6 
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A . Compilation 


No  errors. 

B . E »e  c lit  i on 

In  N C 2 1 6 , the  following  INSPECT  test  is  emecuted: 

INSPECT  identifier-1  TALLYING  identifier-?  FOR  ALL  ’A* 
identifier-3  FOR  LEACING  'AH' 
identifier-4  FOR  CHARACTERS  BEFORE 
identifier-5  FOR  CHARACTERS  AFTER  'AL* 


REPLACING 
F I RST 

•L  * BY 

* Z 7 ■ AFTER  INITIAL  • A L • 

FIRST 

•BAD*  BY 

•Z7Z  * 

AFTER  ■ L * 

LEADING  •BAD* 

BY  ‘111 

■ BEFORE  INITIAL  'O’ 

FIRST 

•BAD*  BY 

'HZ' 

BEFORE  INITIAL  *Z' 

FIRST 

•BAD*  BY 

•77Z  * 

AFTER  'ALL  * 

ALL  * . 

* BY  *7  * 

AFTER 

•AL’. 

The  initial  contents  of  identifer-1,  PICTUREd  as  X(83),  is: 


AH  YES  AH  YES 
DOGS  AND  KIDS 

U.C . FRI TOF  S HERE . 
CAN  NOT  BE  ALL  PAD. 

ANYONE  WHO  HATES 

The  test  gave 

the  following  error 

indicat  ions: 
COMPUTED  VALUE 

CORRECT  VALUE 

identifier-1 

(last  eight  char, 
final  value) 

ALZ7BADZ 

AL777ZZZ 

identifier-3 

1 

0 

identifier-4 

15 

13 

i dent i f i e r-5 

6 

5 

For  identifer-1,  since  the  boundary  for  comparison  in  the  second 
REPLACING  phrase  (AFTER  * L * ) is  established  before  • L * is 
replaced  by  *77*  (first  REPLACING  clause),  'BAD*  will  indeed 
be  matched  and  replaced  by  ‘HZ’.  [See  11-71,  5(c). I 

For  identifier-3,  the  second  TALLYING  for  leadino  * A H • will 
never  participate  in  a comparison  because  each  ’A*  in  the  first 
TALLYING  clause  operation  is  matched  prior  to  the  'AH'  comparison. 
The  match  of  'A*  terminates  the  comparison  cycle  on  the  ’A*  and 
starts  a new  comparison  cycle  on  the  character  that  is  immediately 
to  the  right  of  the  matched  'A*.  [See  11-70  5(c)  and  11-71  6(c). 1 

For  i den t i f i er -4,  whenever  an  *A*  match  is  made  by  the  first 
TALLYING  clause,  the  third  TALLYING  clause  is  not  performed,  so 
the  count  of  "CHARACTERS  BEFORE  is  13  (or  15  - 2)  and  not 

15. 
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For  identifier-5*  and  lor  the  same  reason  as  above*  the  number 
of  "CHARACTERS  AFTER  • A L * " is  5 and  not  fc*  since  the  ‘A’  in 
the  last  six  characters  of  the  strino  is  ir, atched  by  the  first 
TALLYING  clause*  and  thusly  is  not  eligible  for  matching  by  the 
fourth  TALLYING  clause. 

NC217*  NC21P 

A . Compi l at  ion 
No  errors. 

E . Execution 

No  failures. 
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RELATIVE  I-C,  LFVFL  2 
RLcCI  thru  RL 205 

A.  Compilation 
Ko  errors. 

6 . Execution 

A o failures. 
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segmentation*  LEVEL  2 
Sr,2L1  thru  S G 2 0 A 

A.  C on  p i l <1 1 i on 
No  errors. 

P.  Execution 

No  f ai  lures . 
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SE  (Hit  N T I A L ACCESS,  LEVEL  1 

S3101 

A.  Compilation 
No  errors. 

P . Execution 

SC1C1  and  SQ1S1  monitor  the  use  and  omission  of  the  ADVANCING 
phrase  in  WHITE  statements.  Incorrect  spacino  was  performed  when 
the  omission  of  the  ADVANCING  phrase  apparently  defaulted  to 
...  BEFORE  1 LINE  instead  of  ...  AFTER  1 LINE  as  the  Standard 
requ  ires. 

SOI  02  thru  SC1 1 7 

A . Compilation 
No  errors. 

E.  Execution 

No  failures. 

SCIId,  SG119,  and  SQ120 

A.  Com,  pilation 

1.  In  S0119  and  SQ120,  fatal  errors  were  flagged  on  the  construct 

"CODE-SET  ASCII-CODE" 

located  in  the  file  description  <FD)  for  a seguential  file.  In 
each  case  when  the  optional  word  *IS'  was  added  the  compiler 
accepted  the  syntax  of  the  statement  containing  the  CODE-SET 
clause. 

2.  In  SQ118,  SQT19,  and  SG12C  the  non-standard  clause  "RECORDING 
AIODE  IS  STANDARD-ASCII"  had  to  be  added  to  the  SFLFCT  statements 
for  the  files  which  produced/read  ASCII  tape  tiles  durinq  the 
ASCII  validation  of  the  C omp  i l e r / Cp e r a t i n a System.  The  CODE- 
SET clause  in  the  File  Description  Entry  was  present  for  these 
tape  files  and  the  use  of  the  non-standard  clause  should  not 
have  been  necessary. 

B.  Execution 

No  failures. 

SQ121 
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A . Compilation 

In  50121,  a fatal  error  " 'AT  FND*  CLAUSE  RECUIRED"  flagged  the 
const  ruct # 

KCAD  SG-FS5  RECORD.” 

S0-FS5  had  been  previously  OPENed  for  1-0  and  had  associated 
with  it,  a declarative  procedure  whose  USE  statement  read, 

"USE  AFTER  STANDARD  ERROR  PROCEDURE  ON  1-0." 

SG151 

A.  Compilation 
No  errors. 

B.  E xecut ion 
See  SlilUI. 

SQ152,  S0 1 5 3 

A . Comp i l a t i on 
No  errors. 

B.  Execution 

No  failures. 
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SEQUENTIAL  ACCESS,  L E \/  T L 2 
SN201  thru  SQ21S 

A.  Corrpil.ition 
No  errors, 
b.  [locution 

No  (oilures. 
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*•  Compilation 
h’o  errors. 

R • Execution 

E o failures. 
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TABLE -HANDLING  MODULE  * LEVEL  1 
TH101  thru  T H1 1 1 » TH151,  Th152 
A . Cor-.p  i l a t i on 
No  errors  . 

B . E *ecut ion 

No  f ai lures  . 
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COh.*UM  C A T ION  MODULE 
Author's  Note: 

ECCTS  does  net  currently  officially  validate  this  module  since  (1)  a 
large  volume  of  requests  for  interpretation  on  this  module  have  been  submitted 
to  the  cognizant  ANSI  committee  < X 3 J 4 ) for  resolution*  and  (?)  facilities  for 
testing  this  CCVS  modjte  were  insufficient  to  determine  the  validity  of  these 
tests  during  the  development  of  CCVS 74. 

* o w e v e r * thp  subject  DEC  compiler  includes  an  implementation  of  the 
Communication  Module  and  during  the  official  validation*  the  CCVS  tests  for 
this  module  were  run  on  an  unofficial  basis.  It  is  significant  to  note  that 
the  implementation  fully  passed  all  tests  with  the  follovinq  eicept  ion.  yhen 
a prooram  issues  a D1SABLF  to  an  output  terminal*  the  CCVS  assumes  the  trans- 
mission link  will  be  broken  and  message  transmission  will  cease  from  the  output 
queue  as  soon  as  the  message  then  being  transmitted  is  completed  (next  E*I). 

The  DEC  implementation  does  not  cease  transmission  until  the  current  cressaqe 
group  is  finished  (next  E3I). 
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